home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-03 / qbasicpg.zip / IF-2.BAS < prev    next >
Encoding:
BASIC Source File  |  1989-08-31  |  310 b   |  12 lines
  1. ' IF-2.BAS
  2. ' This program demonstrates the AND logical operator.
  3.  
  4. CLS
  5.  
  6. INPUT "How many teenagers can fit in a phone booth?  ", guess%
  7. PRINT
  8. IF guess% > 9 AND guess% < 13 THEN PRINT "That's right!!"
  9. PRINT "Depending on their size, approximately 10 to 12"
  10. PRINT "teenagers can fit in a phone booth."
  11.  
  12.